home *** CD-ROM | disk | FTP | other *** search
/ Celestin Apprentice 2 / Apprentice-Release2.iso / Tools / Languages / MacPerl 4.1.3 / macscripts / PerlFromAppleScript < prev    next >
Encoding:
Text File  |  1993-08-18  |  96 b   |  3 lines  |  [TEXT/ToyS]
  1. tell application "MacPerl"
  2.     Do Script "&MacPerl'Reply(join(\", \", stat(\"MacPerl\")))"
  3. end tell